home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 13
/
AMIGAplus Sonderheft 13 (1998)(ICP)(DE)[!].iso
/
rexx
/
getsiaddr.sirexx
< prev
next >
Wrap
Text File
|
1997-08-28
|
401b
|
20 lines
/* Show SI's task address. */
options results
address 'INSPECTOR.1'
/* Select the task list. */
GetDisplay ; currentdisplay = result
If currentdisplay ~= 17 Then SetDisplay 17
/* Select SI's task (it's always the first one. */
SelectNode Num 0
/* Get column 0's content (task address) and display it. */
GetNodeInfo 0 ; address = result
Say 'SysInspector''s task is located at '||address||'.'